home *** CD-ROM | disk | FTP | other *** search

---

/ Developer Source 4 / developer source - volume 4.iso / parad / mar94 / pb_fig09.gif

< prev

next >

Graphics Interchange Format  |  1996-07-10  |  29KB  |  648x498  |  4-bit (5 colors)

Labels: text | screenshot | font | number
OCR: POWERBAR :: SAVECLOSE :: saveSettings* . . method saveSettings( ) inifile .open(":PRIV:powerbar .ini", ""nw") message ( "Saving your custom settings ... "') for i from 1 to nbtns if not cmdcode[i] isassigned( ) then cmdcode[i] = "N" endIf if not bttncmd[i] isassigned( ) then bttnomd[i] = endIf if not bttnpic[i] isassigned( ) then bttnpic[i] = endIf if not bttnmsg[i].isassigned( ) then bttnmsg[i] = endIf inifile writeline(objname[i]+"]",cmdcode[i]+"|", btncmd[i]+"|", bttnpic[i]+"|", bttnmsg[i]+"|") endFor iniline = RECORDER passExec() inifile writeString( "RECORDER |" + iniline) iniline = RECORDER .passKeys() inifile .writeString("|"+ iniline) inifile .close() btnsaved = True MINIMBTN .MINCHAR Visible = True endMethod .... No ayпtax етога. Edit Line: Col :: 1

---